inherited AutoCompleteForm: TAutoCompleteForm
  Caption = 'AutoCompleteForm'
  PixelsPerInch = 96
  TextHeight = 13
  inherited lbAutoComplete: TListBox
    OnDrawItem = lbAutoCompleteDrawItem
  end
end